home *** CD-ROM | disk | FTP | other *** search
/ Night Owl 6 / Night Owl's Shareware - PDSI-006 - Night Owl Corp (1990).iso / 002a / corewar.zip / SHIELD.PRG < prev    next >
Text File  |  1991-04-25  |  334b  |  21 lines
  1. BGN SHIELD
  2.         JMP 3
  3. B       DAT 0
  4. C       DAT -100
  5.         MOV #3 -101
  6. G       JWN A @C
  7. E       MOV @B @C
  8.         CMP B #17
  9.         JMP 4
  10.         ADD #1 B
  11.         ADD #1 C
  12.         JMP E
  13.         MOV #-100 
  14.         JMP -108
  15. A       ADD #13 F
  16.         JWN G @F
  17.         MOV #0 @F
  18.         JMP G
  19. F       DAT #0
  20. END
  21.